Szerkesztő:GumiBot/code32

A Wikipédiából, a szabad enciklopédiából

A(z) 32. kódú hibát javító kódrészlet[szerkesztés]

sub fix_32 {	# Double pipe in one link
    my ($error_code, $title_str, $text_str) = @_;

    my $count = 0;
    $count += $text_str =~ s/(\[\[[^\]\|]+)\|{2,}([^\]\|]+\]\])/$1|$2/g;

    $count or return ('Nincs dupla \'|\'');
    my $summary_str = $latin2->decode(
        "Bot: $count dupla '|' megszüntetve. (Hibakód: $error_code)"
    );
    return ($summary_str, $count, $text_str);
}